home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / C-Cl / ClassManag.cpt / Graph / stack_-1.xml < prev    next >
Extensible Markup Language  |  1992-06-18  |  3KB  |  23 lines
  1. <?xml version="1.0" encoding="utf-8" ?>
  2. <!DOCTYPE stack PUBLIC "-//Apple, Inc.//DTD stack V 2.0//EN" "" >
  3. <stack>
  4.     <name>in</name>
  5.     <id>-1</id>
  6.     <cardCount>4</cardCount>
  7.     <cardID>5022</cardID>
  8.     <listID>2980</listID>
  9.     <cantModify><false /></cantModify>
  10.     <cantDelete><false /></cantDelete>
  11.     <cantAbort><false /></cantAbort>
  12.     <cardSize>
  13.         <width>512</width>
  14.         <height>342</height>
  15.     </cardSize>
  16.     <script>on openStackset lockScreen to trueset lockMessages to trueset cursor to 4domenu New Cardglobal nbrglobal varput 0 into itmput 0 into hundrhput 0 into ninhput 0 into eighput 0 into sevhput 0 into sixhput 0 into fifhput 0 into forhput 0 into thirdhput 0 into twenhput 0 into tenhput 0 into zerohrepeat with counter = 1 to varadd 1 to itmput word itm of nbr into testif value of test > 99 and value of test < 120 then add 1 to hundrhif value of test > 89 and value of test < 100 then add 1 to ninhif value of test > 79 and value of test < 90 then add 1 to eighif value of test > 69 and value of test < 80 then add 1 to sevhif value of test > 59 and value of test < 70 then add 1 to sixhif value of test > 49 and value of test < 60 then add 1 to fifhif value of test > 39 and value of test < 50 then add 1 to forhif value of test > 29 and value of test < 40 then add 1 to thirdhif value of test > 19 and value of test < 30 then add 1 to twenhif value of test > 9 and value of test < 20 then add 1 to tenhif value of test >= 0 and value of test < 10 then add 1 to zerohend repeatset lockScreen to falseset lockMessages to falsechoose line toolset linesize to 4if value of hundrh > 0 then ¬¨drag from 90,40 to (90 + (value of hundrh * 10)),40if value of ninh > 0 then ¬¨drag from 90,65 to (90 + (value of ninh * 10)),65if value of eigh > 0 then ¬¨drag from 90,90 to (90 + (value of eigh * 10)),90if value of sevh > 0 then ¬¨drag from 90,115 to (90 + (value of sevh * 10)),115if value of sixh > 0 then ¬¨drag from 90,140 to (90 + (value of sixh * 10)),140if value of fifh > 0 then ¬¨drag from 90,165 to (90 + (value of fifh * 10)),165if value of forh > 0 then ¬¨drag from 90,190 to (90 + (value of forh * 10)),190if value of thirdh > 0 then ¬¨drag from 90,215 to (90 + (value of thirdh * 10)),215if value of twenh > 0 then ¬¨drag from 90,240 to (90 + (value of twenh * 10)),240if value of tenh > 0 then ¬¨drag from 90,265 to (90 + (value of tenh * 10)),265if value of zeroh > 0 then ¬¨drag from 90,290 to (90 + (value of zeroh * 10)),290choose browse toolend openStack</script>
  17.     <background id="2706" file="background_2706.xml" name="" />
  18.     <card id="5022" file="card_5022.xml" marked="false" name="" owner="2706" />
  19.     <card id="3743" file="card_3743.xml" marked="false" name="" owner="2706" />
  20.     <card id="3926" file="card_3926.xml" marked="false" name="" owner="2706" />
  21.     <card id="3223" file="card_3223.xml" marked="false" name="" owner="2706" />
  22. </stack>
  23.